spusteni *ppt souboru

Otázka od: Matejcek Petr

14. 6. 2004 11:26

DD,

    potreboval bych ze sve aplikace spustit Powerpointovou prezentaci
ale nejak se mi nedari
pritom stejnym postupem otevru html, bmp mp3 .... ale ppt ne pritom
kdyz na soubor ppt kliknu v commanderu tak se normalne otevre
jedine co me napada je velikost souboru ...

pls poradi nekdo kde delam chybu ?

tady je kus kodu :

var RunInfo:_ShellExecuteInfo;
  cesta:string ;
  i:integer;
begin
   cesta:='ppt\lam.ppt';
  RunInfo.cbSize:=SizeOf(RunInfo);
  RunInfo.fMask:=SEE_MASK_DOENVSUBST or
                 SEE_MASK_FLAG_NO_UI or
                 SEE_MASK_NOCLOSEPROCESS;

  RunInfo.Wnd:=0;
  RunInfo.lpVerb:='open';
  RunInfo.lpFile:=PChar( cesta );
  RunInfo.lpDirectory:=nil;
  RunInfo.nShow:=SW_SHOWNORMAL;

  ShellExecuteEx(@RunInfo);

end